home *** CD-ROM | disk | FTP | other *** search
/ PC Answers 1998 January / PC Answers Issue 49 Cover CD January 1998.iso / Apps / Director / DATA.Z / Lists Lingo.dir / Scripts_117_deleteAt aPropertyList.ls < prev    next >
Encoding:
Text File  |  1997-05-10  |  397 b   |  11 lines

  1. on mouseDown
  2.   global gDefaultPropList
  3.   doButton()
  4.   set vSetPosition to the text of member "Adding Property DeleteAt Input Field 1"
  5.   set vSetPosition to checkPosition(vSetPosition, count(gDefaultPropList))
  6.   if vSetPosition <> EMPTY then
  7.     deleteAt(gDefaultPropList, vSetPosition)
  8.     set the text of member "Adding Property DeleteAt Display Field 1" to string(gDefaultPropList)
  9.   end if
  10. end
  11.